The National Palace Museum Experience/The National Palace Museum Experience.iso/Programs/TimeLine.dxr/00041_Send to Top.ls

Text File | 1998-11-19 | 498 b | 23 lines

property spriteNum

on mouseEnter me
  sendAllSprites(#sendtotop_toggletrails, #off)
  sendtotop_toggletrails(me, #on)
end

on mouseLeave me
  sendAllSprites(#sendtotop_toggletrails, #off)
  sendtotop_toggletrails(me, #off)
end

on sendtotop_toggletrails me, onoroff
  case onoroff of
    #on:
      set the trails of sprite spriteNum to 1
      set the ink of sprite spriteNum to 37
    #off:
      set the trails of sprite spriteNum to 0
      set the ink of sprite spriteNum to 8
  end case
end